<?php
/*\
 *	oh.array.include.php
 *	--------------------
 *
 *
 *
\*/

function oh_array_set($array,$path,$value) {
	if (is_array($path)) {
		switch (count($path)) {
			case 1: $array[$path[0]] = $value;break;
			case 2: $array[$path[0]][$path[1]] = $value;break;
			case 3: $array[$path[0]][$path[1]][$path[2]] = $value;break;
			case 4: $array[$path[0]][$path[1]][$path[2]][$path[3]] = $value;break;
		}
	}
	return $array;
}

function oh_array_get($array,$path) {
	if (is_array($path)) {
		switch (count($path)) {
			case 1: return $array[$path[0]];
			case 2: return $array[$path[0]][$path[1]];
			case 3: return $array[$path[0]][$path[1]][$path[2]];
			case 4: return $array[$path[0]][$path[1]][$path[2]][$path[3]];
		}
	}
	return null;
}

function aa_diff($a,$b,$d_a,$d_b,$debug=false) {
	$o = 0;
	for ($i=-19;$i<20;$i++) {
		if (isset($a[$i+$d_a])||isset($b[$i+$d_b])) {						
			if ($debug) echo '('.@$a[$i+$d_a].'):('.@$b[$i+$d_b].')';
			if (strlen(@$a[$i+$d_a])>0) {
				if (@$a[$i+$d_a] == @$b[$i+$d_b]) {
					$o++;				
					if ($debug) echo '*';	
				}
			}
			if ($debug) echo '<br>';
		}		
	}
	return $o;
}

function aa_delta($a,$b,$debug=false) {
	$o = -1000;
	$m = -1000;
	for ($i=-19;$i<20;$i++) {
		$t = aa_diff($a,$b,0,$i);
		if ($t>$m) {
			$o = $i;
			$m = $t;
		}
		if ($debug) echo '('.$i.'):('.$t.')<br>';
	}
	return $o;
}

function aa_prog($url,$n) {
	for ($i=0;$i<$n;$i++) $url = dirname($url);
	return $url;
}

function aa_prug($url,$n) {
	$o = "";
	for ($i=0;$i<$n;$i++) {
		$o = substr($url,strlen(dirname($url))).$o;
		$url = dirname($url);
	}
	return $o;
}
